home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 6 / developer source - volume 6.iso / delpp / fig27-07.gif < prev    next >
Graphics Interchange Format  |  1996-11-19  |  27KB  |  640x480  |  4-bit (14 colors)
Labels: text | electronics | display | screenshot | software | number
OCR: Multi-Edit 5 X File Edit Block Search Text Macro Tools Window Tags Vcs Help A C:\DELPRO32\BOOK32\CHAP27\CRESTOR.SQL x CONNECT "c: \ap\ delphi\ 27c\ student. gdb" USER "SYSDBA" PASSWORD "masterkey"; SET TERM A ; CREATE PROCEDURE COUNT_REGISTERED_STUDENTS RETURNS (REGISTERED_STUDENTS INTEGER) AS BEGIN SELECT COUNT (DISTINCT STUDENT_ID) FROM REGISTRATION INTO : REGISTERED_STUDENTS; ENDA CREATE GENERATOR STUDENT_ID_GENA SET GENERATOR STUDENT_ID_GEN TO 200A CREATE PROCEDURE GET_NEW_STUDENT_ID RETURNS (NEW_STUDENT_ID INTEGER) AS BEGIN A L:1 C:1 Ins Caps Num Rec Start Delphi32 E= Writing 21 InterBa ... Multi- Es QuickS. Ty Micros ...